-- Moves the cursor into position to format the first fraction
textcursor -story
textcursor +para
textcursor +eol
textcursor +char
textcursor +word
textcursor +word
textcursor +word
textcursor +word
textcursor +word
textcursor -char
-- Formats the first fraction
textselect -word
typeoptions 80, 58, 33, 0
position subscript
textcursor -char
textselect +char
textenter "/"
textcursor -char
textselect -word
typeoptions 80, 58, 33, 0
position superscript
textcursor +word
textcursor +word
position normal
redraw on
-- Positions cursor for formatting second fraction
textcursor +eol
textcursor +char
textcursor +word
textcursor +word
textcursor +word
textcursor -char
-- Formats second fraction
textselect -word
typeoptions 80, 58, 33, 0
position subscript
textcursor -char
textselect -word
typeoptions 80, 58, 33, 0
position superscript
textcursor +word
textcursor +word
position normal
deselect
-- adjusting position of the textblock
select last left last top
nudge -0.083i -0.083i
deselect
redraw on
pagemargins .75i, .75i, .75i, .75i
newstory 2i, 4i
font "Times"
size 12
paraspace 0p6, 0
textenter "This is an example of the way scripts can be used to automate time-consuming tasks.
One of the tasks automated in this example is the formatting of fractions to enhance their appearance.
A script for formatting fractions has been included in PageMaker 5.0. This script substitutes a non-breaking fraction slash for a standard slash, then changes the numerator to a superscript character and the denominator to a subscript character. To try it, insert the text cursor just to the right of the fraction below (do not highlight the fraction), then choose \"Run Script...\" from the \"Utilities\Aldus Additions\" menu. Select the script \"Fraction\" and be sure that the radio button \"Run: File\" is checked. Then click \"OK\" .